object kwProfileEditForm: TkwProfileEditForm
  Left = 0
  Top = 0
  Caption = 'kwProfileEditForm'
  ClientHeight = 234
  ClientWidth = 444
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 16
    Width = 31
    Height = 13
    Caption = 'Name:'
  end
  object Label2: TLabel
    Left = 16
    Top = 59
    Width = 22
    Height = 13
    Caption = 'User'
  end
  object Label4: TLabel
    Left = 204
    Top = 16
    Width = 57
    Height = 13
    Caption = 'Select user:'
  end
  object DBEdit1: TDBEdit
    Left = 69
    Top = 13
    Width = 121
    Height = 21
    DataField = 'Name'
    DataSource = dsProfile
    TabOrder = 0
  end
  object DBEdit2: TDBEdit
    Left = 69
    Top = 56
    Width = 121
    Height = 21
    DataField = 'UserId.FullUserName'
    DataSource = dsProfile
    TabOrder = 1
  end
  object DBGrid1: TDBGrid
    Left = 204
    Top = 35
    Width = 232
    Height = 120
    DataSource = dsUser
    ReadOnly = True
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'FirstName'
        Width = 96
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'LastName'
        Width = 98
        Visible = True
      end>
  end
  object Button1: TButton
    Left = 131
    Top = 192
    Width = 75
    Height = 25
    Caption = 'Save'
    ModalResult = 1
    TabOrder = 3
  end
  object Button2: TButton
    Left = 212
    Top = 192
    Width = 75
    Height = 25
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 4
  end
  object ieProfile: TInstantExposer
    ObjectClassName = 'TkwProfile'
    Left = 32
    Top = 152
  end
  object dsProfile: TDataSource
    DataSet = ieProfile
    Left = 88
    Top = 152
  end
  object isUser: TInstantSelector
    ReadOnly = True
    AfterScroll = isUserAfterScroll
    Command.Strings = (
      'SELECT * FROM TkwUser')
    Connector = kwCommonData.icXMLConnector
    ObjectClassName = 'TkwUser'
    Left = 264
    Top = 80
  end
  object dsUser: TDataSource
    DataSet = isUser
    Left = 304
    Top = 80
  end
end
